home *** CD-ROM | disk | FTP | other *** search
/ Interactive Web Graphics with Shout 3D / Interactive Web Graphics With Shout 3D.iso / pc / Shout3Ddemo / Shout3d_runtime / codebase / models / coordInterpTest.s3d < prev    next >
Text File  |  2000-05-30  |  2KB  |  24 lines
  1. DEF TIMER TimeSensor{cycleInterval 5.333 numLoops -1}Transform{rotation 1 0 0 .6
  2. children[Shape{appearance Appearance{material Material{diffuseColor 1 0 0}}
  3. geometry IndexedFaceSet{coord DEF Box-COORD Coordinate{point[-1 -1 1 -1 1 1 1 1 1
  4. 1 -1 1 -1 -1 -1 -1 1 -1 1 1 -1 1 -1 -1]}}}Shape{appearance Appearance{material
  5. Material{diffuseColor 1 0 0}}geometry IndexedFaceSet{coord USE Box-COORD
  6. coordIndex[0 3 2 1 -1]}}Shape{appearance Appearance{material Material{
  7. diffuseColor 1 0 0}}geometry IndexedFaceSet{coord USE Box-COORD coordIndex[1 2 6
  8. 5 -1]}}]}Transform{translation -3 0 0 children Shape{appearance Appearance{
  9. material Material{emissiveColor 1 1 1}}geometry PointSet{coord DEF POINTS-COORD
  10. Coordinate{point[0 1 0 0 -1 0]}}}}Transform{translation 3 0 0 children Shape{
  11. appearance Appearance{material Material{emissiveColor 1 1 1}}geometry PointSet{
  12. coord USE POINTS-COORD}}}Transform{translation -4 0 0 children Shape{appearance
  13. Appearance{material Material{emissiveColor 1 1 1}}geometry IndexedLineSet{coord
  14. DEF LINES-COORD Coordinate{point[0 1 0 0 -1 0]}coordIndex[0 1 -1]}}}Transform{
  15. translation 4 0 0 children Shape{appearance Appearance{material Material{
  16. emissiveColor 1 1 1}}geometry IndexedLineSet{coord USE LINES-COORD coordIndex[0 1
  17. -1]}}}DEF MYINTERP CoordinateInterpolator{key[0 .5 1]keyValue[-1 -1 1 -1 1 1 1 1
  18. 1 1 -1 1 -1 -1 -1 -1 1 -1 1 1 -1 1 -1 -1 -2 -2 2 -2 2 2 2 2 2 2 -2 2 -2 -2 -2 -2
  19. 2 -2 2 2 -2 2 -2 -2 -1 -1 1 -1 1 1 1 1 1 1 -1 1 -1 -1 -1 -1 1 -1 1 1 -1 1 -1 -1]
  20. }Route TIMER.fraction To MYINTERP.fraction Route MYINTERP.value To
  21. Box-COORD.point DEF MYINTERP2 CoordinateInterpolator{key[0 .5 1]keyValue[0 1 0 0
  22. -1 0 0 .1 0 0 -.1 0 0 1 0 0 -1 0]}Route TIMER.fraction To MYINTERP2.fraction
  23. Route MYINTERP2.value To POINTS-COORD.point Route MYINTERP2.value To
  24. LINES-COORD.point